home *** CD-ROM | disk | FTP | other *** search
/ CU Amiga Super CD-ROM 12 / CU Amiga Magazine's Super CD-ROM 12 (1997)(EMAP Images)(GB)[!][issue 1997-07].iso / CUCD / Online / QAmiTrack / ARexx / TestTrackRexx.rexx
OS/2 REXX Batch file  |  1997-04-06  |  1KB  |  36 lines
  1. /* Test out QAmiTrack's GET command */
  2.  
  3. address "QAmiTrack"
  4. options results
  5.  
  6. GET stem info. clients actions
  7.  
  8. say "AmiTrack's current state"
  9. say "------------------------"
  10. say "HIDDEN             =" info.hidden
  11. say "COMMENT            =" info.comment
  12. say "LASTENTRYCLICKED   =" info.lastentryclicked
  13. say "SERVER             =" info.server
  14. say "PORT               =" info.port
  15. say "CONFIRM            =" info.confirm
  16. say "CONNECTED          =" info.connected
  17. say "ENABLED            =" info.enabled
  18. say "LOGFILE            =" info.logfile
  19. say "LOGLEVEL           =" info.loglevel
  20. say "SPEAKLEVEL         =" info.speaklevel
  21. say "NUMCLIENTS         =" info.numclients
  22. say "VISIBLETO          =" info.visibleto
  23. say "VIEWBY             =" info.viewby
  24. say "USERNAME           =" info.username
  25. say "REALNAME           =" info.realname
  26.  
  27. do i=0 by 1 for info.numclients
  28.   say " - Client "i"        = ["||info.clients.i||"] username: ["||info.usernames.i||"] realname: ["||info.realnames.i||"] comment: ["||info.comments.i||"] lastChanged: "||info.lastchanged.i||" winopen: "||info.winopen.i
  29. end
  30. say "CURRENTACTION      =" info.currentaction
  31. say "NUMACTIONS         =" info.numactions
  32. do i=0 by 1 for info.numactions
  33.   say " - Action "i"        = ["||info.actions.i||"] command: ["||info.commands.i||"]"
  34. end
  35.  
  36.